home *** CD-ROM | disk | FTP | other *** search
/ CD Fun House 1 / CD Fun House (Wayzata Technology).iso / •The School House• / Astronomical Events ••• / Astronomical Events еее.rsrc / CODE_1.txt < prev    next >
Text File  |  1986-12-21  |  24KB  |  435 lines
  1. # near model CODE resource
  2. # jump table entries: 0-0 (1 of them)
  3. export_0:
  4. 00000000  4EFA 0326                jmp        [PC + 0x326 /* 00000328 */]
  5. fn00000004:
  6. 00000004  4E56 FFF6                link       A6, -0x000A
  7. 00000008  48E7 0108                movem.l    -[A7], D7,A4
  8. 0000000C  422E FFF6                clr.b      [A6 - 0xA]
  9. 00000010  598F                     subq.l     A7, 4
  10. 00000012  4267                     clr.w      -[A7]
  11. 00000014  4EBA 0448                jsr        [PC + 0x448 /* 0000045E */]
  12. 00000018  2E1F                     move.l     D7, [A7]+
  13. 0000001A  2D47 FFF8                move.l     [A6 - 0x8], D7
  14. 0000001E  2D6E FFF8 FFFC           move.l     [A6 - 0x4], [A6 - 0x8]
  15. 00000024  286E FFFC                movea.l    A4, [A6 - 0x4]
  16. 00000028  2854                     movea.l    A4, [A4]
  17. 0000002A  197C 0060 0008           move.b     [A4 + 0x8], 0x60 /* '`' */
  18. 00000030  286E FFFC                movea.l    A4, [A6 - 0x4]
  19. 00000034  2854                     movea.l    A4, [A4]
  20. 00000036  197C 00E0 000B           move.b     [A4 + 0xB], 0xE0
  21. 0000003C  4CDF 1080                movem.l    D7,A4, [A7]+
  22. 00000040  4E5E                     unlink     A6
  23. 00000042  4E75                     rts
  24. fn00000044:
  25. 00000044  4E56 FF00                link       A6, -0x0100
  26. 00000048  48E7 0118                movem.l    -[A7], D7,A3,A4
  27. 0000004C  486E FF00                pea.l      [A6 - 0x100]
  28. 00000050  3F2E 000A                move.w     -[A7], [A6 + 0xA]
  29. 00000054  3F2E 0008                move.w     -[A7], [A6 + 0x8]
  30. 00000058  4EBA 03C0                jsr        [PC + 0x3C0 /* 0000041A */]
  31. 0000005C  286E 000C                movea.l    A4, [A6 + 0xC]
  32. 00000060  47EE FF00                lea.l      A3, [A6 - 0x100]
  33. 00000064  3E3C 00FF                move.w     D7, 0xFF
  34. label00000068:
  35. 00000068  18DB                     move.b     [A4]+, [A3]+
  36. 0000006A  51CF FFFC                dbf        D7, -0x6 /* 00000068 */
  37. 0000006E  4CDF 1880                movem.l    D7,A3,A4, [A7]+
  38. 00000072  4E5E                     unlink     A6
  39. 00000074  2E9F                     move.l     [A7], [A7]+
  40. 00000076  4E75                     rts
  41. fn00000078:
  42. 00000078  4E56 FEF0                link       A6, -0x0110
  43. 0000007C  48E7 0118                movem.l    -[A7], D7,A3,A4
  44. 00000080  286E 0010                movea.l    A4, [A6 + 0x10]
  45. 00000084  2D54 FEF8                move.l     [A6 - 0x108], [A4]
  46. 00000088  2D6C 0004 FEFC           move.l     [A6 - 0x104], [A4 + 0x4]
  47. 0000008E  286E 0008                movea.l    A4, [A6 + 0x8]
  48. 00000092  47EE FF00                lea.l      A3, [A6 - 0x100]
  49. 00000096  3E3C 00FF                move.w     D7, 0xFF
  50. label0000009A:
  51. 0000009A  16DC                     move.b     [A3]+, [A4]+
  52. 0000009C  51CF FFFC                dbf        D7, -0x6 /* 0000009A */
  53. 000000A0  598F                     subq.l     A7, 4
  54. 000000A2  42A7                     clr.l      -[A7]
  55. 000000A4  486E FEF8                pea.l      [A6 - 0x108]
  56. 000000A8  486E FF00                pea.l      [A6 - 0x100]
  57. 000000AC  1F3C 0001                move.b     -[A7], 0x1
  58. 000000B0  3F2E 000E                move.w     -[A7], [A6 + 0xE]
  59. 000000B4  42A7                     clr.l      -[A7]
  60. 000000B6  1F2E 000C                move.b     -[A7], [A6 + 0xC]
  61. 000000BA  2F2E FEF0                move.l     -[A7], [A6 - 0x110]
  62. 000000BE  A913                     syscall    NewWindow
  63. 000000C0  2E1F                     move.l     D7, [A7]+
  64. 000000C2  2D47 FEF4                move.l     [A6 - 0x10C], D7
  65. 000000C6  2D6E FEF4 0014           move.l     [A6 + 0x14], [A6 - 0x10C]
  66. 000000CC  4CDF 1880                movem.l    D7,A3,A4, [A7]+
  67. 000000D0  4E5E                     unlink     A6
  68. 000000D2  205F                     movea.l    A0, [A7]+
  69. 000000D4  4FEF 000C                lea.l      A7, [A7 + 0xC]
  70. 000000D8  4ED0                     jmp        [A0]
  71. fn000000DA:
  72. 000000DA  4E56 FFFC                link       A6, -0x0004
  73. 000000DE  48E7 0108                movem.l    -[A7], D7,A4
  74. 000000E2  49ED FFE8                lea.l      A4, [A5 - 0x18]
  75. 000000E6  2F0C                     move.l     -[A7], A4
  76. 000000E8  A86E                     syscall    InitGraf
  77. 000000EA  4EBA 031E                jsr        [PC + 0x31E /* 0000040A */]
  78. 000000EE  4EBA 031A                jsr        [PC + 0x31A /* 0000040A */]
  79. 000000F2  4EBA 0316                jsr        [PC + 0x316 /* 0000040A */]
  80. 000000F6  4EBA 0312                jsr        [PC + 0x312 /* 0000040A */]
  81. 000000FA  4EBA 030E                jsr        [PC + 0x30E /* 0000040A */]
  82. 000000FE  598F                     subq.l     A7, 4
  83. 00000100  3F3C 0004                move.w     -[A7], 0x4
  84. 00000104  A9B9                     syscall    GetCursor
  85. 00000106  2E1F                     move.l     D7, [A7]+
  86. 00000108  2D47 FFFC                move.l     [A6 - 0x4], D7
  87. 0000010C  2F2E FFFC                move.l     -[A7], [A6 - 0x4]
  88. 00000110  4EBA 02EE                jsr        [PC + 0x2EE /* 00000400 */]
  89. 00000114  286E FFFC                movea.l    A4, [A6 - 0x4]
  90. 00000118  2854                     movea.l    A4, [A4]
  91. 0000011A  2F0C                     move.l     -[A7], A4
  92. 0000011C  A851                     syscall    SetCursor
  93. 0000011E  A8FE                     syscall    InitFonts
  94. 00000120  A912                     syscall    InitWindows
  95. 00000122  A930                     syscall    InitMenus
  96. 00000124  A9CC                     syscall    TEInit
  97. 00000126  42A7                     clr.l      -[A7]
  98. 00000128  A97B                     syscall    InitDialogs
  99. 0000012A  3F3C FFFF                move.w     -[A7], 0xFFFF
  100. 0000012E  4267                     clr.w      -[A7]
  101. 00000130  201F                     move.l     D0, [A7]+
  102. 00000132  A032                     syscall    FlushEvents
  103. 00000134  286E 000C                movea.l    A4, [A6 + 0xC]
  104. 00000138  28AD FF74                move.l     [A4], [A5 - 0x8C]
  105. 0000013C  296D FF78 0004           move.l     [A4 + 0x4], [A5 - 0x88]
  106. 00000142  286E 0008                movea.l    A4, [A6 + 0x8]
  107. 00000146  2F0C                     move.l     -[A7], A4
  108. 00000148  286E 000C                movea.l    A4, [A6 + 0xC]
  109. 0000014C  3E2C 0002                move.w     D7, [A4 + 0x2]
  110. 00000150  5847                     addq.w     D7, 4
  111. 00000152  3F07                     move.w     -[A7], D7
  112. 00000154  286E 000C                movea.l    A4, [A6 + 0xC]
  113. 00000158  3E14                     move.w     D7, [A4]
  114. 0000015A  0647 0018                addi.w     D7, 0x18
  115. 0000015E  3F07                     move.w     -[A7], D7
  116. 00000160  286E 000C                movea.l    A4, [A6 + 0xC]
  117. 00000164  3E2C 0006                move.w     D7, [A4 + 0x6]
  118. 00000168  5947                     subq.w     D7, 4
  119. 0000016A  3F07                     move.w     -[A7], D7
  120. 0000016C  286E 000C                movea.l    A4, [A6 + 0xC]
  121. 00000170  3E2C 0004                move.w     D7, [A4 + 0x4]
  122. 00000174  5947                     subq.w     D7, 4
  123. 00000176  3F07                     move.w     -[A7], D7
  124. 00000178  A8A7                     syscall    SetRect
  125. 0000017A  A850                     syscall    InitCursor
  126. 0000017C  4CDF 1080                movem.l    D7,A4, [A7]+
  127. 00000180  4E5E                     unlink     A6
  128. 00000182  205F                     movea.l    A0, [A7]+
  129. 00000184  508F                     addq.l     A7, 8
  130. 00000186  4ED0                     jmp        [A0]
  131. fn00000188:
  132. 00000188  4E56 FCD6                link       A6, -0x032A
  133. 0000018C  48E7 0300                movem.l    -[A7], D6,D7
  134. 00000190  422E FEE6                clr.b      [A6 - 0x11A]
  135. 00000194  4EBA FE6E                jsr        [PC - 0x192 /* 00000004 */]
  136. 00000198  486E FEDA                pea.l      [A6 - 0x126]
  137. 0000019C  3F3C 0118                move.w     -[A7], 0x118
  138. 000001A0  3F3C 0032                move.w     -[A7], 0x32 /* '2' */
  139. 000001A4  3F3C 01F4                move.w     -[A7], 0x1F4
  140. 000001A8  3F3C 00F0                move.w     -[A7], 0xF0
  141. 000001AC  A8A7                     syscall    SetRect
  142. 000001AE  1D7C 0002 FEEA           move.b     [A6 - 0x116], 0x2
  143. label000001B4:
  144. 000001B4  1E2E FEE6                move.b     D7, [A6 - 0x11A]
  145. 000001B8  0A07 0001                xori.b     D7, 0x1
  146. 000001BC  6700 0142                beq        +0x144 /* 00000300 */
  147. 000001C0  558F                     subq.l     A7, 2
  148. 000001C2  3F3C 0100                move.w     -[A7], 0x100
  149. 000001C6  42A7                     clr.l      -[A7]
  150. 000001C8  A985                     syscall    Alert
  151. 000001CA  3E1F                     move.w     D7, [A7]+
  152. 000001CC  3D47 FFFC                move.w     [A6 - 0x4], D7
  153. 000001D0  0C6E 0001 FFFC           cmpi.w     [A6 - 0x4], 0x1
  154. 000001D6  6600 0006                bne        +0x8 /* 000001DE */
  155. 000001DA  4EFA 0124                jmp        [PC + 0x124 /* 00000300 */]
  156. label000001DE:
  157. 000001DE  3E2E FFFC                move.w     D7, [A6 - 0x4]
  158. 000001E2  5347                     subq.w     D7, 1
  159. 000001E4  3D47 FFFC                move.w     [A6 - 0x4], D7
  160. 000001E8  486E FDD6                pea.l      [A6 - 0x22A]
  161. 000001EC  3F3C 0101                move.w     -[A7], 0x101
  162. 000001F0  3E2E FFFC                move.w     D7, [A6 - 0x4]
  163. 000001F4  DE47                     add.w      D7, D7
  164. 000001F6  5347                     subq.w     D7, 1
  165. 000001F8  3F07                     move.w     -[A7], D7
  166. 000001FA  4EBA FE48                jsr        [PC - 0x1B8 /* 00000044 */]
  167. 000001FE  588F                     addq.l     A7, 4
  168. 00000200  486E FDD6                pea.l      [A6 - 0x22A]
  169. 00000204  486E FFEC                pea.l      [A6 - 0x14]
  170. 00000208  4EBA 026A                jsr        [PC + 0x26A /* 00000474 */]
  171. 0000020C  486E FCD6                pea.l      [A6 - 0x32A]
  172. 00000210  3F3C 0101                move.w     -[A7], 0x101
  173. 00000214  3E2E FFFC                move.w     D7, [A6 - 0x4]
  174. 00000218  DE47                     add.w      D7, D7
  175. 0000021A  3F07                     move.w     -[A7], D7
  176. 0000021C  4EBA FE26                jsr        [PC - 0x1DA /* 00000044 */]
  177. 00000220  588F                     addq.l     A7, 4
  178. 00000222  486E FCD6                pea.l      [A6 - 0x32A]
  179. 00000226  486E FFF0                pea.l      [A6 - 0x10]
  180. 0000022A  4EBA 0248                jsr        [PC + 0x248 /* 00000474 */]
  181. 0000022E  486E FFF4                pea.l      [A6 - 0xC]
  182. 00000232  4EBA 01DC                jsr        [PC + 0x1DC /* 00000410 */]
  183. 00000236  2E2E FFF4                move.l     D7, [A6 - 0xC]
  184. 0000023A  DEAE FFF0                add.l      D7, [A6 - 0x10]
  185. 0000023E  2C2E FFF4                move.l     D6, [A6 - 0xC]
  186. 00000242  9CAE FFEC                sub.l      D6, [A6 - 0x14]
  187. 00000246  598F                     subq.l     A7, 4
  188. 00000248  2F06                     move.l     -[A7], D6
  189. 0000024A  2F2E FFF0                move.l     -[A7], [A6 - 0x10]
  190. 0000024E  4EBA 013A                jsr        [PC + 0x13A /* 0000038A */]
  191. 00000252  2C1F                     move.l     D6, [A7]+
  192. 00000254  9E86                     sub.l      D7, D6
  193. 00000256  2D47 FFF8                move.l     [A6 - 0x8], D7
  194. 0000025A  598F                     subq.l     A7, 4
  195. 0000025C  486E FEDA                pea.l      [A6 - 0x126]
  196. 00000260  3F3C 0004                move.w     -[A7], 0x4
  197. 00000264  4227                     clr.b      -[A7]
  198. 00000266  487A 00A6                pea.l      [PC + 0xA6 /* 0000030E, value 0x194E6578, pstring "Next 12 Occurences at GMT" */]
  199. 0000026A  4EBA FE0C                jsr        [PC - 0x1F4 /* 00000078 */]
  200. 0000026E  2E1F                     move.l     D7, [A7]+
  201. 00000270  2D47 FEE2                move.l     [A6 - 0x11E], D7
  202. 00000274  2F2E FEE2                move.l     -[A7], [A6 - 0x11E]
  203. 00000278  A873                     syscall    SetPort
  204. 0000027A  3F3C 0004                move.w     -[A7], 0x4
  205. 0000027E  A887                     syscall    TextFont
  206. 00000280  3F3C 0009                move.w     -[A7], 0x9 /* '\t' */
  207. 00000284  A88A                     syscall    TextSize
  208. 00000286  3E3C 0001                move.w     D7, 0x1
  209. 0000028A  0C47 000C                cmpi.w     D7, 0xC
  210. 0000028E  6E00 005C                bgt        +0x5E /* 000002EC */
  211. label00000292:
  212. 00000292  2F2E FFF8                move.l     -[A7], [A6 - 0x8]
  213. 00000296  1F2E FEEA                move.b     -[A7], [A6 - 0x116]
  214. 0000029A  486E FEEC                pea.l      [A6 - 0x114]
  215. 0000029E  4EBA 01C8                jsr        [PC + 0x1C8 /* 00000468 */]
  216. 000002A2  3F3C 000A                move.w     -[A7], 0xA /* '\n' */
  217. 000002A6  3C07                     move.w     D6, D7
  218. 000002A8  CDFC 000F                muls.w     D6, 0xF
  219. 000002AC  3F06                     move.w     -[A7], D6
  220. 000002AE  A893                     syscall    MoveTo
  221. 000002B0  486E FEEC                pea.l      [A6 - 0x114]
  222. 000002B4  A884                     syscall    DrawString
  223. 000002B6  487A 0050                pea.l      [PC + 0x50 /* 00000308, value 0x4206174, pstring " at " */]
  224. 000002BA  A884                     syscall    DrawString
  225. 000002BC  2F2E FFF8                move.l     -[A7], [A6 - 0x8]
  226. 000002C0  1F3C 0001                move.b     -[A7], 0x1
  227. 000002C4  486E FEEC                pea.l      [A6 - 0x114]
  228. 000002C8  4EBA 01A4                jsr        [PC + 0x1A4 /* 0000046E */]
  229. 000002CC  486E FEEC                pea.l      [A6 - 0x114]
  230. 000002D0  A884                     syscall    DrawString
  231. 000002D2  2C2E FFF8                move.l     D6, [A6 - 0x8]
  232. 000002D6  DCAE FFF0                add.l      D6, [A6 - 0x10]
  233. 000002DA  2D46 FFF8                move.l     [A6 - 0x8], D6
  234. 000002DE  0C47 000C                cmpi.w     D7, 0xC
  235. 000002E2  6C00 0008                bge        +0xA /* 000002EC */
  236. 000002E6  5247                     addq.w     D7, 1
  237. 000002E8  4EFA FFA8                jmp        [PC - 0x58 /* 00000292 */]
  238. label000002EC:
  239. 000002EC  558F                     subq.l     A7, 2
  240. 000002EE  A974                     syscall    Button
  241. 000002F0  1E1F                     move.b     D7, [A7]+
  242. 000002F2  6700 FFF8                beq        -0x6 /* 000002EC */
  243. 000002F6  2F2E FEE2                move.l     -[A7], [A6 - 0x11E]
  244. 000002FA  A914                     syscall    DisposeWindow
  245. 000002FC  4EFA FEB6                jmp        [PC - 0x14A /* 000001B4 */]
  246. label00000300:
  247. 00000300  4CDF 00C0                movem.l    D6,D7, [A7]+
  248. 00000304  4E5E                     unlink     A6
  249. 00000306  4E75                     rts
  250. 00000308  0420 6174                subi.b     -[A0], 0x74 /* 't' */
  251. 0000030C  2000                     move.l     D0, D0
  252. 0000030E  194E 6578                move.b     [A4 + 0x6578], A6
  253. 00000312  7420                     moveq.l    D2, 0x20
  254. 00000314  3132 204F                move.w     -[A0], [A2 + D2.w + 0x4F]
  255. 00000318  6363                     bls        +0x65 /* 0000037D */
  256. 0000031A  7572                     moveq.l    D2, 0x72
  257. 0000031C  656E                     bcs        +0x70 /* 0000038C */
  258. 0000031E  6365                     bls        +0x67 /* 00000385 */
  259. 00000320  7320                     moveq.l    D1, 0x20
  260. 00000322  6174                     bsr        +0x76 /* 00000398 */
  261. 00000324  2047                     movea.l    A0, D7
  262. 00000326  4D54                     chk.w      D6, [A4]
  263. label00000328:
  264. 00000328  2C7C 0000 0000           movea.l    A6, 0x0
  265. 0000032E  4E56 0000                link       A6, 0
  266. 00000332  486D FFF4                pea.l      [A5 - 0xC]
  267. 00000336  486D FFEC                pea.l      [A5 - 0x14]
  268. 0000033A  4EBA FD9E                jsr        [PC - 0x262 /* 000000DA */]
  269. 0000033E  4EBA FE48                jsr        [PC - 0x1B8 /* 00000188 */]
  270. 00000342  3F3C FFFF                move.w     -[A7], 0xFFFF
  271. 00000346  4267                     clr.w      -[A7]
  272. 00000348  201F                     move.l     D0, [A7]+
  273. 0000034A  A032                     syscall    FlushEvents
  274. 0000034C  4E5E                     unlink     A6
  275. 0000034E  4E75                     rts
  276. 00000350  4E56 FFF8                link       A6, -0x0008
  277. 00000354  2F2E 000C                move.l     -[A7], [A6 + 0xC]
  278. 00000358  2F2E 0008                move.l     -[A7], [A6 + 0x8]
  279. 0000035C  486E FFF8                pea.l      [A6 - 0x8]
  280. 00000360  A867                     syscall    LongMul
  281. 00000362  202E FFF8                move.l     D0, [A6 - 0x8]
  282. 00000366  222E FFFC                move.l     D1, [A6 - 0x4]
  283. 0000036A  2D41 0010                move.l     [A6 + 0x10], D1
  284. 0000036E  4E5E                     unlink     A6
  285. 00000370  225F                     movea.l    A1, [A7]+
  286. 00000372  508F                     addq.l     A7, 8
  287. 00000374  4ED1                     jmp        [A1]
  288. 00000376  4EBA 0026                jsr        [PC + 0x26 /* 0000039E */]
  289. 0000037A  2D43 0010                move.l     [A6 + 0x10], D3
  290. 0000037E  4CDF 0078                movem.l    D3,D4,D5,D6, [A7]+
  291. 00000382  4E5E                     unlink     A6
  292. 00000384  225F                     movea.l    A1, [A7]+
  293. 00000386  508F                     addq.l     A7, 8
  294. 00000388  4ED1                     jmp        [A1]
  295. fn0000038A:
  296. 0000038A  4EBA 0012                jsr        [PC + 0x12 /* 0000039E */]
  297. // begin alternate branch 0000038C-0000039A
  298. label0000038C:
  299. 0000038C  0012 2D40                ori.b      [A2], 0x40 /* '@' */
  300. 00000390  0010 4CDF                ori.b      [A0], 0xDF
  301. 00000394  0078 4E5E 225F           ori.w      [0x0000225F], 0x4E5E /* 'N^' */
  302. // end alternate branch 0000038C-0000039A
  303. label0000038C: // (misaligned)
  304. 0000038E  2D40 0010                move.l     [A6 + 0x10], D0
  305. 00000392  4CDF 0078                movem.l    D3,D4,D5,D6, [A7]+
  306. 00000396  4E5E                     unlink     A6
  307. fn00000398:
  308. 00000398  225F                     movea.l    A1, [A7]+
  309. 0000039A  508F                     addq.l     A7, 8
  310. 0000039C  4ED1                     jmp        [A1]
  311. fn0000039E:
  312. 0000039E  225F                     movea.l    A1, [A7]+
  313. 000003A0  4E56 0000                link       A6, 0
  314. 000003A4  48E7 1E00                movem.l    -[A7], D3,D4,D5,D6
  315. 000003A8  4280                     clr.l      D0
  316. 000003AA  222E 000C                move.l     D1, [A6 + 0xC]
  317. 000003AE  5BC5                     smi        D5
  318. 000003B0  6A02                     bpl        +0x4 /* 000003B4 */
  319. 000003B2  4481                     neg.l      D1
  320. label000003B4:
  321. 000003B4  242E 0008                move.l     D2, [A6 + 0x8]
  322. 000003B8  5BC6                     smi        D6
  323. 000003BA  6A02                     bpl        +0x4 /* 000003BE */
  324. 000003BC  4482                     neg.l      D2
  325. label000003BE:
  326. 000003BE  4283                     clr.l      D3
  327. 000003C0  383C 001F                move.w     D4, 0x1F
  328. label000003C4:
  329. 000003C4  E38B                     lsl        D3, 1
  330. 000003C6  E389                     lsl        D1, 1
  331. 000003C8  E390                     roxl       D0, 1
  332. 000003CA  9082                     sub.l      D0, D2
  333. 000003CC  6B06                     bmi        +0x8 /* 000003D4 */
  334. 000003CE  08C3 0000                bset.b     D3, 0x0
  335. 000003D2  6002                     bra        +0x4 /* 000003D6 */
  336. label000003D4:
  337. 000003D4  D082                     add.l      D0, D2
  338. label000003D6:
  339. 000003D6  51CC FFEC                dbf        D4, -0x16 /* 000003C4 */
  340. 000003DA  4A05                     tst.b      D5
  341. 000003DC  6702                     beq        +0x4 /* 000003E0 */
  342. 000003DE  4480                     neg.l      D0
  343. label000003E0:
  344. 000003E0  BB06                     xor.b      D6, D5
  345. 000003E2  6702                     beq        +0x4 /* 000003E6 */
  346. 000003E4  4483                     neg.l      D3
  347. label000003E6:
  348. 000003E6  4ED1                     jmp        [A1]
  349. 000003E8  225F                     movea.l    A1, [A7]+
  350. 000003EA  201F                     move.l     D0, [A7]+
  351. 000003EC  A04C                     syscall    CompactMem
  352. 000003EE  2E80                     move.l     [A7], D0
  353. 000003F0  4E71                     nop
  354. 000003F2  7000                     moveq.l    D0, 0x00
  355. label000003F4:
  356. 000003F4  2F09                     move.l     -[A7], A1
  357. label000003F6:
  358. 000003F6  31C0 0220                move.w     [0x00000220 /* MemErr */], D0
  359. 000003FA  4E75                     rts
  360. 000003FC  7000                     moveq.l    D0, 0x00
  361. 000003FE  60F6                     bra        -0x8 /* 000003F6 */
  362. fn00000400:
  363. 00000400  225F                     movea.l    A1, [A7]+
  364. 00000402  205F                     movea.l    A0, [A7]+
  365. 00000404  A029                     syscall    HLock
  366. 00000406  4EFA FFEC                jmp        [PC - 0x14 /* 000003F4 */]
  367. fn0000040A:
  368. 0000040A  A036                     syscall    MoreMasters
  369. 0000040C  4EFA FFE8                jmp        [PC - 0x18 /* 000003F6 */]
  370. fn00000410:
  371. 00000410  225F                     movea.l    A1, [A7]+
  372. 00000412  205F                     movea.l    A0, [A7]+
  373. 00000414  20B8 020C                move.l     [A0], [0x0000020C /* Time */]
  374. 00000418  4ED1                     jmp        [A1]
  375. fn0000041A:
  376. 0000041A  4E56 0000                link       A6, 0
  377. 0000041E  594F                     subq.w     A7, 4
  378. 00000420  2F3C 5354 5223           move.l     -[A7], 0x53545223 /* 'STR#' */
  379. 00000426  3F2E 000A                move.w     -[A7], [A6 + 0xA]
  380. 0000042A  A9A0                     syscall    GetResource
  381. 0000042C  226E 000C                movea.l    A1, [A6 + 0xC]
  382. 00000430  4211                     clr.b      [A1]
  383. 00000432  201F                     move.l     D0, [A7]+
  384. 00000434  6720                     beq        +0x22 /* 00000456 */
  385. 00000436  2040                     movea.l    A0, D0
  386. 00000438  2050                     movea.l    A0, [A0]
  387. 0000043A  3018                     move.w     D0, [A0]+
  388. 0000043C  322E 0008                move.w     D1, [A6 + 0x8]
  389. 00000440  B240                     cmp.w      D1, D0
  390. 00000442  6E12                     bgt        +0x14 /* 00000456 */
  391. 00000444  7000                     moveq.l    D0, 0x00
  392. label00000446:
  393. 00000446  5341                     subq.w     D1, 1
  394. 00000448  6706                     beq        +0x8 /* 00000450 */
  395. 0000044A  1018                     move.b     D0, [A0]+
  396. 0000044C  D1C0                     add.l      A0, D0
  397. 0000044E  60F6                     bra        -0x8 /* 00000446 */
  398. label00000450:
  399. 00000450  1010                     move.b     D0, [A0]
  400. 00000452  5240                     addq.w     D0, 1
  401. 00000454  A02E                     syscall    BlockMove/BlockMoveData
  402. label00000456:
  403. 00000456  4E5E                     unlink     A6
  404. 00000458  205F                     movea.l    A0, [A7]+
  405. 0000045A  508F                     addq.l     A7, 8
  406. 0000045C  4ED0                     jmp        [A0]
  407. fn0000045E:
  408. 0000045E  7406                     moveq.l    D2, 0x06
  409. label00000460:
  410. 00000460  205F                     movea.l    A0, [A7]+
  411. 00000462  3F02                     move.w     -[A7], D2
  412. 00000464  2F08                     move.l     -[A7], A0
  413. 00000466  ADED                     syscall    Pack6, auto_pop
  414. fn00000468:
  415. 00000468  7400                     moveq.l    D2, 0x00
  416. 0000046A  4EFA FFF4                jmp        [PC - 0xC /* 00000460 */]
  417. fn0000046E:
  418. 0000046E  7402                     moveq.l    D2, 0x02
  419. 00000470  4EFA FFEE                jmp        [PC - 0x12 /* 00000460 */]
  420. fn00000474:
  421. 00000474  206F 0008                movea.l    A0, [A7 + 0x8]
  422. 00000478  3F3C 0001                move.w     -[A7], 0x1
  423. 0000047C  A9EE                     syscall    Pack7/DecStr68K
  424. 0000047E  206F 0004                movea.l    A0, [A7 + 0x4]
  425. 00000482  2080                     move.l     [A0], D0
  426. 00000484  4EFA 0010                jmp        [PC + 0x10 /* 00000496 */]
  427. 00000488  206F 0004                movea.l    A0, [A7 + 0x4]
  428. 0000048C  202F 0008                move.l     D0, [A7 + 0x8]
  429. 00000490  3F3C 0000                move.w     -[A7], 0x0
  430. 00000494  A9EE                     syscall    Pack7/DecStr68K
  431. label00000496:
  432. 00000496  205F                     movea.l    A0, [A7]+
  433. 00000498  504F                     addq.w     A7, 8
  434. 0000049A  4ED0                     jmp        [A0]
  435.